Imports System.Collections.Generic
Imports System.Linq
Imports System.Text
Imports System.IO
Imports Microsoft.Xna.Framework
Imports Microsoft.Xna.Framework.Audio
Imports Microsoft.Xna.Framework.Content
Imports Microsoft.Xna.Framework.GamerServices
Imports Microsoft.Xna.Framework.Graphics
Imports Microsoft.Xna.Framework.Input
Imports Microsoft.Xna.Framework.Media
Imports Microsoft.Xna.Framework.Input.Touch

Public MustInherit Class Item
	Public Texture As Texture2D
	Public itemAnimation As New AnimationSequence()
	Public itemState As New TileState()
	Private flip As SpriteEffects = SpriteEffects.None
	Private position As New Position(New Vector2(0, 0), New Vector2(0, 0))

	Private Shared m_itemSequence As New List(Of Sequence)()
	Public Property ItemSequence() As List(Of Sequence)
		Get
			Return m_itemSequence
		End Get
		Set
			m_itemSequence = value
		End Set
	End Property

	Public Sub Update(gameTime As GameTime, keyboardState As KeyboardState, gamePadState As GamePadState, touchState As TouchCollection, accelState As AccelerometerState, orientation As DisplayOrientation)
		Dim elapsed As Single = CSng(gameTime.ElapsedGameTime.TotalSeconds)
		itemAnimation.UpdateFrameItem(elapsed, position, flip, itemState)
	End Sub

End Class
